home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 11-06.C < prev    next >
Text File  |  1991-05-05  |  516b  |  30 lines
  1. #define DELAY 2
  2. #define JUMP  4
  3.  
  4. main()
  5. {
  6.    int i;
  7.    int old_mode;
  8.  
  9.    old_mode = fg_getmode();
  10.    fg_setmode(fg_automode());
  11.  
  12.    fg_setcolor(15);
  13.    fg_move(0,JUMP);
  14.    fg_draw(fg_getmaxx(),JUMP);
  15.    fg_draw(fg_getmaxx(),fg_getmaxy()-JUMP);
  16.    fg_draw(0,fg_getmaxy()-JUMP);
  17.    fg_draw(0,JUMP);
  18.    fg_waitkey();
  19.  
  20.    for (i = 0; i < 6; i++) {
  21.       fg_pan(0,JUMP);
  22.       fg_waitfor(DELAY);
  23.       fg_pan(0,0);
  24.       fg_waitfor(DELAY);
  25.       }
  26.  
  27.    fg_setmode(old_mode);
  28.    fg_reset();
  29. }
  30.